home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.20021006-20030409 / 000184_fdc@columbia.edu_Tue Dec 17 13:49:27 EST 2002.msg < prev    next >
Text File  |  2020-01-01  |  3KB  |  72 lines
  1. Article: 13966 of comp.protocols.kermit.misc
  2. Path: newsmaster.cc.columbia.edu!news.columbia.edu!news-not-for-mail
  3. From: fdc@columbia.edu (Frank da Cruz)
  4. Newsgroups: comp.protocols.kermit.misc
  5. Subject: Re: Control characters with minput
  6. Date: 17 Dec 2002 13:46:00 -0500
  7. Organization: Columbia University
  8. Lines: 55
  9. Message-ID: <atnrd8$8o9$1@watsol.cc.columbia.edu>
  10. References: <6b84683a.0212171034.6c28e6fe@posting.google.com>
  11. NNTP-Posting-Host: watsol.cc.columbia.edu
  12. X-Trace: newsmaster.cc.columbia.edu 1040150774 8565 128.59.39.139 (17 Dec 2002 18:46:14 GMT)
  13. X-Complaints-To: postmaster@columbia.edu
  14. NNTP-Posting-Date: 17 Dec 2002 18:46:14 GMT
  15. Xref: newsmaster.cc.columbia.edu comp.protocols.kermit.misc:13966
  16.  
  17. In article <6b84683a.0212171034.6c28e6fe@posting.google.com>,
  18. EBH <ebh@burntmail.com> wrote:
  19. : I recently upgraded from kermit version 6.0.192 to kermit version
  20. : 8.0.206, and it seems to me that minput functions differently. I have
  21. : a kermit script that waits for an ENQ from the remote computer nad
  22. : sends a transaction is response to the ENQ.
  23. : 
  24. : I wrote the following code to search for ENQ or EOT and move to the
  25. : correct part of the script accordingly:
  26. : 
  27. : minput 60 \005 \004
  28. : switch \v(minput) {
  29. : :0, echo {*** No response received, redialing ***}, -
  30. :     goto RESTART, break
  31. : :1, echo {Transmitting \%c - \%k:\%m}, -
  32. :     goto ENQ, break
  33. : :2, echo {*** EOT received, redialing ***}, -
  34. :     goto RESTART, break
  35. : :default, echo {Invalid resonse: \v(input), sending NAK}, -
  36. :     increment num'enq, output \021, goto START
  37. : }
  38. : 
  39. : This worked fine in kermit 6.0.192, but in kermit 8.0.206 even though
  40. : I get a Ctrl-E and the command "echo \fcode(\v(input))" prints 5, but
  41. : the switch always executes the code for 0. And when I issue "echo
  42. : \v(minput)" it returns 0.
  43. : 
  44. : So, the question is as follows: Did this cahnge in kermit 7 or 8. And
  45. : if it did, how can use minput to search for multiple control
  46. : characters?
  47. :
  48. I guess it's a syntax quirk as the language has evolved over the years.
  49. Try it this way (in C-Kermit 8.0):
  50.  
  51.   minput 60 "\5" "\4"
  52.   switch \v(minput) {
  53.     :0, echo "*** No response received - redialing ***"
  54.       goto RESTART
  55.         break
  56.     :1, echo "Transmitting \%c - \%k:\%m"
  57.       goto ENQ
  58.         break
  59.     :2, echo "*** EOT received - redialing ***"
  60.       goto RESTART
  61.         break
  62.     :default
  63.         echo "Invalid resonse [\v(input)] - sending NAK"
  64.       increment num'enq
  65.         output \021
  66.         goto START
  67.   }
  68.   
  69. (Yes, the old way should still work but apparently it doesn't).
  70.  
  71. - Frank
  72.